home *** CD-ROM | disk | FTP | other *** search
/ Ahoy 1987 November / Ahoy_Magazine_87-11_1987_Double_L.d64 / The Count 64 (.txt) < prev   
Commodore BASIC  |  2022-10-26  |  374b  |  11 lines
  1. 1 rem *** the count...c-64 ***
  2. 2 a=700:rem *** change a to relocate ***
  3. 3 printchr$(147)"loading";
  4. 4 forb=atoa+38:readc:pokeb,c:d=d+c:print".";:nextb
  5. 5 print:print:ifd<>6713thenprint"error in data...":end
  6. 6 print"ok * sys"a"to count...":end
  7. 7 data160,0,132,251,132,252,165,43,166,44,133,253
  8. 8 data134,254,200,177,253,240,13,230,251,208,2,230
  9. 9 data252,170,136,177,253,184,80,234,165,252,166,251
  10. 10 data76,205,189
  11.